-- card: 2195 from stack: in -- bmap block id: 6053 -- flags: 4000 -- background id: 13501 -- name: import ----- HyperTalk script ----- on openCard global delay unlock screen wait (delay * 2) seconds click at the loc of card button "MPNT" wait round(delay * 1.5) seconds click at the loc of card button "DRAWII" wait round(delay * 1.5) seconds click at the loc of card button "AI88" wait round(delay * 1.5) seconds end openCard on closeCard put " " into card field 1 end closeCard -- part 3 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=63 top=208 right=275 bottom=320 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 3 -- text size: 12 -- style flags: 768 -- line height: 16 -- part name: icontype -- part 4 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=316 top=241 right=278 bottom=347 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: MPNT ----- HyperTalk script ----- on mouseUp put "This is a standard paint or bit map file icon also known as a" && "MacPaint® or MPNT type." && " Can be generated by many programs." into card field 1 put 1 into c repeat until c=4 add 1 to c play "Harpsichord" 90 set the hilite of me to true wait 30 play "Harpsichord" 85 set the hilite of me to false wait 30 end repeat end mouseUp -- part 5 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=358 top=45 right=82 bottom=389 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp put "This is a MacDraw® PICT file icon also known as" && "an object oriented graphic format." && " PICTs can be generated by many programs."into card field 1 put 1 into c repeat until c=4 add 1 to c play "Harpsichord" 92 set the hilite of me to true wait 30 play "Harpsichord" 87 set the hilite of me to false wait 30 end repeat end mouseUp -- part 6 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=358 top=84 right=121 bottom=392 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: DRAWII ----- HyperTalk script ----- on mouseUp put "This is a MacDraw® II PICT" && "graphic file format." into card field 1 put 1 into c repeat until c=4 add 1 to c play "Harpsichord" 92 set the hilite of me to true wait 30 play "Harpsichord" 87 set the hilite of me to false wait 30 end repeat end mouseUp -- part 7 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=358 top=123 right=160 bottom=389 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp put "This is a SuperPaint® 2.0 PICT file icon that represents all" && "of its PICT format files." into card field 1 put 1 into c repeat until c=4 add 1 to c play "Harpsichord" 92 set the hilite of me to true wait 30 play "Harpsichord" 87 set the hilite of me to false wait 30 end repeat end mouseUp -- part 8 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=359 top=162 right=199 bottom=390 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp put "This file icon is from a common Compuserve® PICT graphic" && "known as GIF format." into card field 1 put 1 into c repeat until c=4 add 1 to c play "Harpsichord" 92 set the hilite of me to true wait 30 play "Harpsichord" 87 set the hilite of me to false wait 30 end repeat end mouseUp -- part 9 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=358 top=201 right=238 bottom=389 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp put "This is a MacDraft® PICT file icon also known as an" && "object oriented format." into card field 1 put 1 into c repeat until c=4 add 1 to c play "Harpsichord" 92 set the hilite of me to true wait 30 play "Harpsichord" 87 set the hilite of me to false wait 30 end repeat end mouseUp -- part 11 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=357 top=241 right=277 bottom=391 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp put "This is a Cricket Draw® PICT file icon. Cricket Draw" && "can also create EPSF graphic files." into card field 1 put 1 into c repeat until c=4 add 1 to c play "Harpsichord" 92 set the hilite of me to true wait 30 play "Harpsichord" 87 set the hilite of me to false wait 30 end repeat end mouseUp -- part 12 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=401 top=123 right=160 bottom=432 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp put "This is an Adobe Illustrator® EPSF file." into card field 1 put 1 into c repeat until c=4 add 1 to c play "Harpsichord" 88 set the hilite of me to true wait 30 play "Harpsichord" 83 set the hilite of me to false wait 30 end repeat end mouseUp -- part 13 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=400 top=162 right=199 bottom=431 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: AI88 ----- HyperTalk script ----- on mouseUp put "This is an Adobe Illustrator 88® EPSF file." into card field 1 put 1 into c repeat until c=4 add 1 to c play "Harpsichord" 88 set the hilite of me to true wait 30 play "Harpsichord" 83 set the hilite of me to false wait 30 end repeat end mouseUp -- part 14 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=401 top=201 right=238 bottom=432 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp put "This is a Cricket Draw® EPSF file. Cricket Draw will" && "also save in PICT format." into card field 1 put 1 into c repeat until c=4 add 1 to c play "Harpsichord" 88 set the hilite of me to true wait 30 play "Harpsichord" 83 set the hilite of me to false wait 30 end repeat end mouseUp -- part 15 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=401 top=240 right=277 bottom=432 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ----- HyperTalk script ----- on mouseUp put "This blank icon can be found with applications that" && "do not provide a custom icon for their files." && " This could be a FreeHand® EPSF." into card field 1 put 1 into c repeat until c=4 add 1 to c play "Harpsichord" 88 set the hilite of me to true wait 30 play "Harpsichord" 83 set the hilite of me to false wait 30 end repeat end mouseUp -- part 16 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=0 top=0 right=18 bottom=12 -- title width / last selected line: 0 -- icon id / first selected line: 25382 / 25382 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: ptr -- part 17 (field) -- low flags: 00 -- high flags: 2002 -- rect: left=0 top=0 right=29 bottom=512 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 3 -- text size: 14 -- style flags: 768 -- line height: 18 -- part name: -- part contents for card part 17 ----- text ----- Import AND Export PICTs, MPNTs and EPSF Graphics -- part contents for card part 3 ----- text -----